home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00184_INICIO.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  2.2 KB  |  22 lines
  1. on startMovie
  2.   global Primero, Punto, Debug, muerte, full_video, video, EnMuerte
  3.   set the visible of sprite 40 to 0
  4.   IniciaNiv()
  5.   Inicio()
  6.   activaNiveles()
  7.   preLoad(Primero + Punto, Primero + Punto)
  8.   go(Primero + Punto)
  9. end
  10.  
  11. on Inicio
  12.   global Punto, TabA, TabDe, TabIni, Primero, Sala, Niv, niv_sonido1, niv_sonido2, ayuda_on, objeto_nik
  13.   set ayuda_on to 0
  14.   set the volume of sound 1 to niv_sonido1
  15.   set the volume of sound 2 to niv_sonido2
  16.   set objeto_nik to 0
  17.   set TabIni to [1, 401, 801, 1401]
  18.   set TabDe to [279, 283, 278, 250, 276, 240, 277, 241, 287, 291, 286, 258, 284, 248, 285, 249, 294, 266, 292, 256, 293, 257, 239, 243, 236, 208, 237, 209, 247, 251, 244, 216, 255, 259, 263, 267, 262, 218, 270, 226, 269, 217, 207, 211, 204, 184, 205, 185, 212, 192, 223, 227, 222, 194, 229, 193, 183, 187, 182, 162, 181, 153, 188, 160, 189, 161, 197, 169, 159, 163, 158, 138, 157, 129, 164, 136, 165, 137, 173, 145, 135, 139, 134, 98, 142, 106, 141, 97, 148, 120, 149, 121, 103, 107, 102, 58, 110, 66, 109, 57, 119, 123, 116, 88, 117, 89, 124, 96, 63, 67, 62, 34, 71, 75, 70, 42, 69, 33, 79, 83, 78, 50, 76, 40, 77, 41, 87, 91, 84, 48, 85, 49, 92, 56, 39, 43, 38, 26, 47, 51, 45, 25, 52, 32, 29, 17, 21, 9, 13, 1, 455, 459, 453, 433, 463, 467, 462, 442, 460, 440, 469, 441, 438, 418, 437, 409, 444, 424, 445, 425, 415, 419, 413, 401, 423, 427]
  19.   set TabA to [287, 275, 254, 274, 236, 280, 245, 273, 295, 283, 262, 282, 244, 288, 253, 281, 270, 290, 252, 296, 261, 289, 247, 235, 204, 240, 213, 233, 255, 243, 212, 248, 263, 251, 271, 259, 222, 258, 230, 266, 221, 265, 215, 203, 180, 208, 189, 201, 188, 216, 231, 219, 198, 218, 197, 225, 191, 179, 166, 178, 157, 177, 156, 192, 165, 185, 173, 193, 167, 155, 142, 154, 133, 153, 132, 168, 141, 161, 149, 169, 143, 131, 102, 130, 110, 138, 101, 137, 116, 152, 125, 145, 111, 99, 62, 98, 70, 106, 61, 105, 127, 115, 84, 120, 93, 113, 92, 128, 71, 59, 38, 58, 79, 67, 46, 66, 37, 65, 87, 75, 54, 74, 36, 80, 45, 73, 95, 83, 44, 88, 53, 81, 52, 96, 47, 35, 30, 34, 55, 43, 29, 41, 28, 56, 21, 25, 13, 17, 5, 9, 463, 451, 437, 449, 471, 459, 446, 458, 436, 464, 445, 465, 422, 434, 413, 433, 420, 448, 429, 441, 423, 411, 405, 409, 431, 419]
  20.   set Primero to label("Niv" & Niv & Sala) - getAt(TabIni, Sala)
  21. end
  22.